home *** CD-ROM | disk | FTP | other *** search
/ Mission to McDonaldLand / Mission To McDonaldLand.iso / flight.dxr / 00280_Script_SOUND+SWAP < prev    next >
Text File  |  1998-10-25  |  694b  |  24 lines
  1. on mouseDown me
  2.   global restoration
  3.   global castrestore
  4.   global nomore
  5.   global soundstuff
  6.   puppetSound 1, the castnum of sprite the spritenum of me - 2
  7.   set the member of sprite restoration = castrestore
  8.   set castrestore = the castnum of sprite the spritenum of me
  9.   set restoration = the spritenum of me
  10.   set the member of sprite the spritenum of me = the castnum of sprite the spritenum of me - 1
  11.   set nomore = 1
  12.   set soundstuff = 1
  13. end
  14.  
  15. on enterFrame me
  16.   global castrestore
  17.   global restoration
  18.   global soundstuff
  19.   if SoundBusy(1) = FALSE and soundstuff = 1 then 
  20.     set the member of sprite restoration = castrestore
  21.     set soundstuff = 0
  22.   end if
  23. end
  24.